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Quick and dirty database 

We re getting data-base hungry here. We use commercial datatiase 
programs for many chores, but we have applications where we need 
to he stile to manipulate a la^ amowt e( data with a large nuijjJaer 
of fiddfe under program control. In incBt caaes, ttie size of ttie 
datatiase a commercial product wIU handle is not the problem; the 
limitation we run into is the "programmabUity" of the database. We re 
interested in finding something that tias the following characteristics: 

• The size of the data file should not be limited by memoiy. 

• The data files should be reasonably compact. 

■ The data files $ho(iid tje in a standard text forrnat, 

• "tie fall A^Dtt citajader setmist be supported. 

■ Access for daily use shouM be acc^tably fast, 

• The commands and the data format should be extensible. 

■ It must be able to be script-driven. 

The tumbling block has been the "script driven' item; we'd like to 
filid sonieiiili^ fl tee Ashton-Tate s dBASE program running under Pro- 
BOS or OS/OS on an Apple II. Many other things will be needed, of 
ddurse; sort roudnes, data import/export and report generation, and 
pOiSlbly relational capabilities. But the initial challenge is to look at 
this Ust and see how much of it can be prototyped up "quick and dirty" 
so we can test our model before we commit to any large-sc^e devd- 
opment. The prototyping sounds like a job for Applesoft. 

Applesoft has a few iimitations that affect this list. Access speed 
may become a problem for a large file if we do anything labor inten- 
sive such as searching ali fields of an records, or trying to sort the 
entire database. With even a simpile program runnkig, though, the lim- 
itations can be examhied. tete do it right now. 

One problem we'll quicltly encounter is that Applesoft's 'IHFUT' 
statement is a little sensitive about colons and commas. We pub- 
lished an 'input anything" routine in September 1985, with some bug 
corrections in the October 1985 issue. This time, to keep the test pro- 
gram small cmd simple, we're going to modify the data so that the 
'Input anything" routine isn't needed. By beginning each data item 
with a quotation mark, Applesoft's INPUT will accept all printable 
ASCII characters in the item up to the carriage return (the character 
normally iised to indicate the end of the item) or a second quote 
marK. whichever is encountered ibsL We can Uve with this limitation 
ferowr testing purposes, 

The expeiment begins with data culled from an AppleWorks data 
base file of audio recordings. Each database record consists of two 
fields; the recording's artist and title. The data was printed to a text 
file and a quote marK was added to the first of each line. Two records 
of the data look lihe th^: 

"liuii. me 

'BSSh, Kite 
'Wholt Stoiy, The 

Those of you who are interested in programming using text files 
may be familiar with the hvo types of organization BASIC-SYSTEM 
uses for those flies: sequential and random ac<^. tn sequ^^tlal 
files, each data item Is stored Immediately following the pri^^#t$g 
Item. If we indicate a carriage return character wth a '-i', then our huti 
rece^ds shared sequentially look tiKe this: 



"Bull, Ktben'*Li«ii»a£t-.<'BiuIi,.Kitfr'f1lbal( Stoiyr Hit-i 

Using the random access method, on the other hand, each record 
is given a fixed length. The fields for the record are stored sequential- 
ly, and any unused space remaining in the record is padded with 
something. If we use a *A" for padding, for example, then our two 
records stored in a random msm file mBi a ifeoord length Of 30 
would looK liKe this; ^ 

"Bush, Kate-^]ioiil»art-^AMMA"Bu5b, Kate^'Shgle Stoiy, Tbe-, 
(our second record is exactly thirty characters in length). 

The advantage of a random access text file is that to locate record 
number "n*, you only have to multiply the record number by the 
iBcoFd length teumips we call tiie fust record to the file reoprd 'O"). 
BASIC.SYSTs;m i^s tl& ht you automaHcaDy when fm specify a 
record number while reatflng from or writing to a random access file. 
On the other hand, by keeping the data in a sequential text file, space 
is saved over the use of a random access text file; every record in the 
random access file must be at least as long as the longest record in 
the nie. Records that are shorter than th& Tixed maximum length yM 
waste storage space. 

For the 125 records in the test data used, the average record 
length was 29,852 bytes. The longest record was 61 bytes, aid the 
smallest was 8 bytes. A sequential text file with the digfa was . 5723 
bytes; an equivalent random access file would be over twice as long 
at 7625 bytes. Our initial quest is to find a way to do basic operations 
(read a record, add a record, delete a record) on a disk-based data file 
with a compromise between acceptable performance and manage- 
able file size. 

The conventional wisdom for accessing data In the middle of a 
sequential text (ile accei}ls that you i^d and discard the preceding 
data, lYoginams such as AppleWorks amd§i their sequential data by 
loading it all Info memoiy at mnet the advantage to tiiis method is 
that data in RAH can be access^ed faster than data on a <SsK sq the 
"read and discard' operation is quick. But this also limits the size of 
your database to the size of available RAM. To remain disk-based, we 
need a sequential text file that allows us to locate the start of any 
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record in the Rte wlOtcfut having to i^cl the intervening data. 

The answer is to create a second text file which wtU be an index file 
to our data. We can read the sequential text file one Hme and create a 
table.of pointers that tell us at what byte offset each new record in 
the data-file begins, We write this data into a random access text Tile 
that can be accessed quickly. 

This is a simple example of a technique called ISAM; the 
abbreviation stands for indexed sequc^nHal access method", 6y index- 
ing the sequenHal text file, accessing a specific record is perfemed 
by gdting Ihe index value for the record of interest from a "table". 
Jumping to the indexed point in the data file, and reading the record's 
data. Since a table of numbers pointing to positions within a file is 
often more uniformly sized OBib' Jii bytes In length) 

fhjm information such as names or Book tfHes, fliere isnt mvicii &f a 
penally for using a random access file to hold the table. The limit for 
a ProDOS file is 1 6 megabytes, so a record length of 9 (8 bytes for the 
maximum pointer value of '16,777.215" expressed as an ASCII string, 
plus a carriage return) will suffice for the index file. BASIC. SYSTEM'S 
t^ Rle cotntnaBds include the to nme to a spedfic liyte in a 
Rie. 

Working from this file model, we Ij^ln the exerdse by aeflning a 
few standard variables: 

1100 HEM — set up standard Tar.ies -— 
1110 D$ = CUB? StE8 obligatory Control-D 

1120 mmt = 2: DIM F$(HFiEii)S) : BEH tvo fields/iecoid 
1130 DP$ = ''CDLIST": FEH data file 
1140 IDXF? = "CliHSI.r; FEM index file 

NFIELDS holds the number of fields in each record; two for our test 
data. r$(n) will be used to hold the data for field number n. Dr$ 'and 
IDXF$ are our data and index file pathnames, respectively. 

Next, we want to open our worl^files and collect any additional 
information needed regarding them. One piece of necessary informa- 
tion Is the end-of-file (EOF) value for the data file; when a record is 
added, this will become the index to the new record. There's no easy 
way to extract ffiis valiie purely by tiSifng BftSlC, so we imanlpia^ 
BASlC.SYSTEM's MLI interface to pass us the EOF after we open the 
dataiiie and PEEK the value from the BAS1C.SYSTEM global page: 

USD m — open each file nd get EC? and ncoid qsm — 

1170 PRES? "iltS 

1180 FOB 4SS3}, not {'tSSfSy: HDtBore file lef nrtwiv.^;!^ 

1190 EESTOSE : FOR I = 7«8 TO 778: BEAD HV: POKE KBHl 

12DD DATA 169,209,32,112,190,141,10,3,24,96,0 

1210 CALL 768; IF PEEK 1778) < > TEQi STOP 

122D EOF = PEIK (48840) + PEEK (48841) * 256 i PEEK (48842) * £553fi 

These lines create and run a small ^sembf^ language routine that 
gets the EOF for us. 

toother necessary value to know is the number of accessible 
records in the datafile. This program is designed to maintain that 
value In record number of the index file, and reads it into the vari- 
able KC at the start of the program for future refesrence: 

123$ IF W= timm^tim 1280: m no iKOKb ^ '^obU" iil* 
1240 TKO! taB$ (IJ^'BEiS ','IS3EF$;MI0" 
1250 1»PDT''«;RC 

i2eo mm d$ 

To lie fwi#oitel Utie 4a^ l3«s6 nm^ to pefprm a few ^pl« 
commands. Tlie minimum operattons we deterrnihed to tx neCessaiy 
for experimentation were adding new data, removing obsolete data, 
and reading any record from the file. There are many obviously useful 
enhancements that could be added; sorting the data, searching the 
data, printing reports, editing existing data, and so on; but reading, 
adding, and removtog records in the datable Ble are the ttasic build- 
ing blocks. 

Our command interpreter will allow the user to display", 'add*, 
and 'remove' records, in addition, we add the c^p^i^iliiy of 'patadng" 
the data retxirds {purging any records martcei as 'tooved), and 'qiiit- 
ing' flie program, The format selected is simple; each command is 
represented by a single character ("D", "A", "R", T, or "Q") followed by a 
record number for the display and remove commands. For example 
'DlOO" would display record number 100, 'A" would add a new 



record, and RIOO"' would remove record IDO: 
1280 BEH — bargun bsosot camaiid Istezpcitw. — 
1290 IMPUT "Cossand?>";CMDj 
1300 IF IZH (CMD$) = THIS 1398, 
mo C^s I£FT$ (CHD$,1) 

1320 If LEN (CHD$) > 1 HBtl m \ mm^ (00)$, LEN (CHD$} - l]\ 
W P^- 'K' Oft = "I* 3SH» GOSUB 1790: GOTO 1290;, m^M m reoacd 
133S IT'IIC « Jm IXfK 1370; RHil display, remore, pact IMilid 
1340 IF C$ = "D" OR CS = "d" THEN GOSUB 1540: GOTO 1293: REM display 
1355 IF C5 = "R" OR C? = "r" TIEH GOSUB 1540: GOTO 1290: REM ramovB record 
1360 If'c$ = "P" OR C$ = "p" TEKH GOSUB 1320: GOTO 1163: ISWpscIt, 
1370 IF C$ = "Q" OR C$ = MEM GOTO 148(1: REM quit 
1380 VSSM 

In case a command is not reqognlmi, a reminder is printed to the 

screen: 

1390 PRQIT SPC( Sl/Vilid camaods are:' 

1400 PiUKT f!EC|10);"A - add low teeonl" 

IWS !f s O 'lBElr 09T0 1440: ffiK'dis^Ity, zte^t- pi/St imiSlM 

1410 PRIST SPC{ lS);"Dn - display record In" 

1425 JRINT SPC| 10);"Rn - remove record tn" 

1430 PRIffll SPC110);"P - pack ditaba,6e" 

1440 PRINT SPC( 10);"Q - quit program" 

1450 PRINT 

1460 GOTO 1290: REM loop back for next 0(0$ 

This command Interface isn't very "user friendly'; for now we'll use 
the excuse that this is only a test. Designing a user interface is one Of 
the more tedious parts of writing a program, and deserves more care 
than we re willing to commit to our experiment at this stage. 

"A"dding a record requires a subroutine to accept data for the 
new record, write the data to the data file, add the pointer to the data 
to the index file, and update the reajrd' count. Hew data is entered 
from the tieyboard in a loop that tises IMFUT to read KeytMSB^ data 
into each field variable i'$(n): 

1790 RSM — handle addiog r«cord — 

1800 PRDil SPC[ SJ'SddinjMn iteord,.,* 

1810 FOR F = 1 TO Itri^S 

leo : fite iCi: ISh^feld ";, 

1S30 ; mPDT "";F4(r) 

1840 : NEXT F 

1850 PRINT 

When the data entiy is complete, a subroutine to write the data 
called. When ii ifeftiitiS, ffic new record is adoiowledged and "A'dd 
returns to the command processor: 

1860 PRINT SPC( 5) .-"Please wait; writing new record..." 
1870 G0E7E 2180 

18B0 PRDII SfC( IQ); "Record ";RC;" added'.' 

ms mm 

1300 RETURN 

The new data win be appended to the end of the file. BASIC.5Y5- 
TEH does have an AFFEFID command, but the EOF must be known to 
the program for the index values. Since EOF is always available in the 
program, the BASIC. SYSTEM "R'ecord and B'ytc parameters are used 
with READ and WRITE to move BASIC.SY5TEM s position-in-file pointer. 
W {the first record In the file) is specified to give BA5IC.SYSTEM a 
definite reference pdnt, lait the real offset is determined by using 
EOF Ete the "B"yte effect In line 2190, Adding the new necord Tcquires 
us to increase the EOF value by the length of the fields added in the 
loop of lines 2210 through 2240 (the math is handled in line 2230). 
Then the record count RC is increased by 1 and the pointer to the 
start of the new record Is written to its place (record RC) in the index 
file in line 2260, and the new record count is Waittcn to record 
(lines 2280 and 2290). 
2110 I8t — write (append) new lisiipd 
2ii0 BniT D$;"HRITE ";DF5;",R0,B";B0F 
2200 FTR = EOF: S£H we'll update EOF as «e go 
2210 FOR 7 = 1 TC HFIEIDS 

2220 : mat CHS$ (34|;F$(F) : m precede with quote 
m :Sar « i5F 4 m (F$(ri ) *2i m update fUs lengi^ 
22)0 : mi 
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mi W=K ^l.man ncbid coDit 
2260 PRIST D$; "SRITE ";IDXrf;",R';IIC 
2270 PRINT PTR: REM write record's index 
2260 PRINT D$;"»RIIE ";mF$;',RO" 
2290 PRINT 8C: RSH wiUe nw itcoid count 

231.0 WNHS 

'Display and 'K'emovc are both dependent upon a record num- 
ber passed in variable R. A single routine is called to check for a valid 
record number (line 1550); if the record number is correct then the 
"D'ispla^f operation (lines 1600 through 1660) is performed to elSier 

case to show the contents of the record retpiested: 

1540 [£M -■- handle display (and lemoTe) — 

1550 IF R > UD It < - RC ira G9IC UOO 

15(0 PSIHT 

1570 PHUT SPC( Sl;"Saiif; xesssisis^ V'B;' " iarBUd." 

19S atnt ^1 SJ^'Tbe cuiient lUige ij 1 to MtC;".' 

1399 aieflifcisi^skip display 

UOS GOSDB 2CIS0: m get lecoid data 

UIO PRINT 

1620 PRIST SPC( 5);"Recordr;R;":" 

im FOR F 1 TO NFIKLQS 

U40 : PKIKT SPC( 10:l;f$(F) 

liso i ms F 
im mm 

The display subroutine read$ the index pointer for the indicated 
record (lines 2090 and 2100), uses the pointer in conjunction with 
"READ " to pqsitton Itself at the start of the retard in the clata file (line 

2110); 

2080 M — read record H — 

20SO PRINT D$;"READ ";I[1XF$; ",R";R; REM from record R of iadei 
2100 IHPDT "";PTR; HEM get pointer to record R of data 
21111 PRIST OS; "HEM ■■;DFS;",Mjr,-{lKf m point to aeori 
2120 F = 1 10 HFIELDS 

m : mmnm-^mmi 

2140 : NEXT F 
2150 PRinD$ 

216D mm 

Une 1670 contirms only "D'ispiay was iiequested. If not, lines 1680 
thPQp 1690 coitfirm that the ffl#layed tefSM fl^ald be irm^d 0s 
"removed" and perform the exorcism by caOtog other submuine^ 
1670 IF CS = "D" OR CS = "d" THEH GOTO 1710 
1680 PRIST SPC{ 5); INPUT "REM(JVE TBIS RECORD? (K/N) ; ";AS 
1690 IF LKn; (li$,ll = 'T OR I£n$ (A$,l) = "f TEH) SOSUE 1730 
1700 EICDff 
1710 RITOTN 

The "R"emove subroutine displays some status information as It 
calls the routine to actually remove the repofd: 
1730 REM — h#Bdla itmm — 
1740 PRINT SFC( S|,'''lleaaviiig iec«id; please Hit. 
1750 GOSDB 2330 

1760 PRINT SFC( Id) ; "Record marlied as retnared." 
1770 fiETDRN 

Deletion' ftom any pteee other ttjan the end of the sequenti«a file 
is trldqf. Onr Trdtee* Gbmihand afotils the Issue By i^ovhg the 
pointer to the record from the list of "active " pointers in the index file, 
and the data is left intact in the sequential file until we do some spe- 
cific house cleaning at a later time. 

Unlike a random-access file, the record length within our sequential 
data file is not constant, and there s no guarantee that a new record 
written in the position of a record previously removed is going to be 
the same size. If the new record is smaller there is no problem; just a 
little 'dead space' amounting to the difference of the deleted record's 
lengtti in comparison to the record that replace % |f the new recoiiij 
is loflfier, then a major catastrophe occurs! Sie aew lecoid will over^ 
flow ihc gap left by deletion of the old ifecotd md wtB W& ftt 
bepining of the record which fcdlows the deleted record In the file, 
destroying it. 

Avoiding this wholes;£de desfnictlcii of data is the leason fat addtog 



new records to the end of the data file, and this causes another dilem^ 

ma: as records are deleted, the amount of ""dead space"" in the file 
grows. This is a drawback of the sequential organization of the data 
file. Still, random access files have a tougher problem if the length of 
a new record should happen to exceed the record length specified 
when the random access file was created. In the case of random 
access file, either the offending record has to be cut off to fit in the 
available space, or the contents of the file must be copied to a new 
file with a sufficiently larger record lengh [and corresponding 
increase in disk space used). 

This program removes the reference to the record by moving the 
record s index pointer to the end of the index file and decreasing the 
number of 'active' records by one, which puts the pointer "out of 
reach" of the commands using the "RC value. Once the pointer is 
removed from the table of available records, the removed" record 
(which still exists in the data file) is not accessible to the program. If 
the data to be (and therefore its index pointer) is at the end 

of the file, Uie program skips to the routine to adjust the record 
ediait: 

2330 REM — delete record R (frrai indei) — 
2340 PRIST DS; "REM ";IDn'$;",R'';R 
2350 DIPDT "";SPTE; REM save pointer 

2360 IF R = RC TGEN GOTO 245C: WS special case for last record 

If the record is not the last record in the file, then its index pointer 
is saved, all the rest of the pointers are moved to "'compress' the 
index file: and the saved pointer is written to the last record of the 
index>fllf! 

m m.i*tn.m-i. 

2380 ; imril5;'»HB^ "MMfS;",!'';! + 1 

2390 : INPUT "";PTR 

2400 : PRINT D$;"fHIIIE ";IMFS;",R";I 

2410 : PRINT PIK 

2420 : HSXI I 

2430 PEOH D};"RI51 •;lDffjj;'',»"TlE 

2440 PRINT SEIR: REH save "deleted" pointer 

Then th^! recwd count value is reduced by one and saved: 

2450 DC le - 1: 1101 Hik as dilttsd 

2460 PBIHT 0$;"HRIIE ";ID![F5;",R";0 

2470 PRan SC: REM update "Talid" lacoid count 

24S0 PBIHID} 

2490 mm 

Mote that "A"d<flilg a new record will cause the pf^r t&t M bst 
record 'removeef IB be overwritten and lost If you pTefar, the pointer 
(and even the data record it points to) could be copied to new files so 
that a database of "removed" records is maintained. Even in the event 
that the pointers are lost, a "recovery' program can be written to scan 
the data file to see if records exist other than those the index files 
indicates; if so, the recovery program can reconstruct the index point- 
er entry for a 'hidden" recorid. Hfe leave thfe m an exctcfse for the 
reader. 

Tacking the active records purges the "dead space and the 
associated data ftom the files. The first thing the program does is con- 
fbth th^ th«! us(^ i%ally wshts to # this; 

1920 REM — handle pitt ooouad ^-^ 

1930 PRIST 

1940 PRINT SPC( 5j; 'PACKING WILL PDES; ALL 'REMOVED' RECORDS'" 
1S50 PHHT SK{ 51; IHPOT "Is tlsis wlut you wnt? (J/H): ";AS 

1969 TF ISn$ («$, !) = t " (ffi tM4} = T ^ eSSDB SOfil) 

1970 PEBiT 
1980 RETCKM 

The "Pack subroutine maintains a safety factor by creating new 
workfiles and copying the "active" data from the current files into the 
new files, [t then tries to refiiwtf the oii^nal files with names ending 
in ".OLD". If something |emwR»ig during Bie packing but before the 
renaming operation, tM Mgihal data iM dther be available under 
the original filenames. If the Tackfi^ tiferation completes but the 
new files don't seem to work, they can be deleted and the ".OLD files 
renamed to recover the original data If the "Packing operation is suc- 
cessful, the ".OLD" files need to be deleted or renamed so they don't 
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interfere with the next TacMng toforinatioa! 

20M SEN — pad; praftiBj — , i 

2010 PRIHT 

2020 PRINT SPC( 5) ;"Pl«ase mit; packuij dsU iniindu files.., . ^ 
2030 HHDB 2510 

2040 ma SFC( lO); 'Packing dew. Rstane '.OLD' files bafoi*" . 
ZD50 mst SK[ 10) ; 'Uifi Dot {lacking gpei^tian.' 
2D6D EETOXK 

To transfer ttie data, two new fUes (one for tile index pointers^ Oiie 
for the data) ending in ".riEW are opened: 

2510 w 'pmfiffKH (ittii^^idu files. — 

2520 EEINT D$;"OPIB ";DF$;M!W 
2530 PRINT DS;'.'OPP M]Jff?,'".tEB,L9" 

Then an "update end-of-flle" variable UEOf is assigned to hold the 
length of the new sequential data file fO' when newly opened, of 
course). The index poktjgr for eadi adlve record is teas, mi the 
^Kkt@ file's index pointer (DFTR) is set equal to UEOF. the cunent 
EOF for the update Hie. Each record's data is fransferred to the new 
file, UFTR is written to the new index file to mark the record's pdsi- 
tion, and UEOr is adjusted by the lengths of the record s fields. 

25:10 ;tnt = 0: sm m< ll i$dafcB l^a u m go 

m wR-iKse 

25^0 : &m m: m lad lecoid tl 

2570 :DPTS = OEOT: BDI pointer fv ifdate £il« 

2580 : PRIHI D$;''BHII!; ";DFS;MIW 

2590 : FOF F = 1 TO NFimS: m nit* to net fil« 

2600 :: PRim CHIl$ (34);F$(I| 

261D ::DEOF = UEOr + m 'f 2: ItEK.i^date tpdalM BCF 

2620 :;MBtIF 

2fi40 : wm QFBt: sai iidn tot r«coid in m fik 
2650 ; am II 

How the record count is written to ttie new %; " 

im PRIST D^-'KRITE ";IDn'S/.NEK,R";M 
2670 PRINT RC: REM write eecord count 

Finally, the original files are dosed. The original files are KRanxed 
to mark them as the '.QLD' versions, and the '.flEW files ateien^ned 
to ttiaiaih aie otytiM file nmaeis to tettMe th«! «orKirg fflem When 
the subroutine returns to the command processor loop (line 1360), a 
QOTO 1 160 passes control to the initializ^on point of the program. 

2680 PRIHT D$; "CLOSE": !i£H so ire can do lenanes 
26S0 IRDU D5;"BBffl ";J3Fi-",";DF5;",OLD" 

mmMf^mim «;w?r*^iiE»,''tsp!f 

iTif mB-MfWrn ";IDXr$;",";ID3[F?;».0Ui!' 
2720 tbrtB^'SKUE ";IDXFS;''.HBi,";IOXF$ 
2730 m (we'll n-ep^ iM filas 'Hm w i0am] 
2740 mm 

The only remaining coniinand Is "QM. M it does Is dose all flt^, 

say goodbye, and end; 

1480 REM — handle quit — 

1490 PRINT Dj.-'caosr 

1500 FRIMI 

1510 mm "Sta pa liter,' 
1520 PRINT DS;"BYi:'' 

Finally, we have the obligatory disclaimer: 

W: -M.^ dttibase => 
1810 aB[%iM^:&IU 

tm IDf plisbed in tin %v«riier 1989 isflu* of A£-CtBtnl 
lOtO SEM this piofraa is plased in the potdic diwifl 

The program is veiy (no pun intended) basic. Enor-checking is min- 
imal and recovery Is near nonexistent. It's intended as a sReleton 
from which to build more detailed and possibly even specialized pro- 
grams. The data format can be extended by using data flelds to refer 
to records In other files (see "MaKing AppleWorks relational , June 
1987). Commands can be added simply by adding them to the com- 
mand processor along with the necessary program code. 

Access speed tests were run with a larger database of 3430 



records with 10 fields per Siq^ird, and compared with access to the 
mm data in a random file. The average record lenatb was 
about d9.6 (the m^ecimani ms 120, tbe minimum @6), one 
hundred record numbers were generated at random, and a test pro- 
gram timed how long it took to position to the start of each of those 
100 records on average. It averaged atwut 90 milliseconds for the 
random access file; about 170 milliseconds for the indexed file if the 
record indices were stored in memory, and about 210 milliseconds if 
they were read from the index file on disk (tiie disk used was a Chi- 
nook CT-30 hard drive interfaced with an Apple I! SCSI card). Whether 
cutting the access speed in tialf is wortlj the savings in disk space is 
Something that has to be decided for eadi setof real data. 

If you think the desi^ choice of the command IiB& routine is total' 
ty undesirable, poiider fliis for the future: as written, tfte plrbgram &a 
be directly driven with a BAS1C.SY5TEM EXEC file. And there is ne# 
ing to prevent tlie principles from being applied to a program for 
another environment, in another language. It wasn't designed as a Ilgs 
Desktop program, but there's nothing to impede that style of imple- 
mentation. 

ISAN has some disadvantages; the most apparent is that packing 
the database is a time-consuming operation, If changes to the records 
already in the database are infrequent, though, the need to pack the 
database is infrequent We anticipate that in our applications the 
packing won't be ini^^Siaiy any more often than we need to back up 
the database, and llie method of packing outlined in this article acbt 
any combines both operations, 

By using an index file, we can even split our database into multiple 
files; for example, to fit on smaller disk volumes if a hard disk isn't 
available. Once the index value for a record is found, it can be com- 
pared to the known maximum filesize for a volume; if it exceeds that 
maximum, we calculate which file we need and ask the user to insert 
the proper disk if necessaiy. This also gives us a way to deal with Fro- 
DOS's 16 megabyte file size limit If our data requirements ever 
ext^ i by fttcKl^Siil the index fflle to hoW Jiumbeis larger than 16 
m^bytes.-DJD 

AppleFest San Francisco 

Msh points of ibn Francts43o's September Applefest included 

the aowds that continue to pack Brooks Hall and tlie Civic Auditori- 
um (over 19,000 people attended the show); sneak previews of some 
upcomincj OS/OS desk accessories during the keynote speeches ^ven 
by Jean-Louis Qassee and Bernard Qifford; and the first meeting of 
the Apple II Developers Asi^^on. Low points included Qassee pub- 
licaily blamina the hardw« speed limitations of the 4ppie iigs on the 
Westens Deagn Center^ iie absence ftm the ©ittt fl^ of tte 
woalft feilpst Apple II soi^#^ company, Clar^ ipd a^«aa JacK 
oF breathtaking new products. 

The new desk accessories Include one that enlarges the QS/OS 
graphics screen two, four, or eight times for visually impared users; 
one that allows entry of keystrokes using only a mouse or a special 
headset and puff switch, for disabled users; and one that allows a 
VCR to be used to show short se^ents of video mateiial on com- 
mand, much like a laserdisk. 

Claris says its marketing dollars are tietter spent on direct 
mall. This is a sensible thing for a small company to s^, but it's non- 
sei# txjMiing torn Claris. Tie aswipjtt^ ihe^ if Hie softwire 
s^es in the Apple n third-pat% ciommiHiHy h^ an obB^atJon to sup- 
port the Apple II. Period, 

Gassee's outburst followed a question from the door about 
the lack of a faster Dgs, Clearly he is tired of Apple taking the blame 
for this. Wtien he pushed the blame off on the Western Design Center, 
however, that company's president. Bill Mensch, said the problem was 
that Apple had refused to work with him since the Ilgs was intro- 
duced. Its impossible to figure out who's right here, but its easy to 
see the deadlock between the two companies isnt doing the Apple U 
any good, Apple wW either have to learn to wori( with Mensch or learn 
how to build Its own faster 65816 microprocessor clone if we're ever 
going to see a faster Iigs.-TW 
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Corrections and amplifications 

Laralne Toms, Claris Mditd: Nansiger M 
Detafkm CwnpiAeiS&vkesin Austrana. wrote 
to conert our ^atement Oiat the AppleWorks 
5.0 'no disk' upgrade will be available ir\ Aus- 
tralia ('AppleWorks 3.0 upf^rades', September 
1989). Dataflow supports the AppleWorks 3.0 
upffsde in Australia and is responsible for 
sendinci det.iils to those Australian customers 
that sent (.hcck.'i to Claris USA along with the 
A2'Central coupon as their checks are 
returned, but the 'no disk' offer will not be 
vedkl ^iere.-BklD 

Apple II association 

The last couple of issues of Al^xntrai and 
TIic Soorceror'5 Apprentice have mentioned the 
formation of an Apple II Developer's Associa- 

I have seei Httte more in eite {nibOc^n 
oQier tlum adoiowte^meitt of ft» teaaHon. I 
am interested In joining so<ft an otipi^ion. I 
would appreciate informatton <m how to directly 
contact the organization, membership require- 
ments, cost and specifics about the orgamza- 
tion's ol^iectives and IseneRts. 

Jerry L Lewis 
Lxjveland, Colo. 

the momenf, there Is no formal organiza- 
tion, no membership requirements, no dues. If 
you'd like to be on the group's maUfng list, 
send your name, address, and phone number 
to Apfde U Devdi^s Association, c/o Stone 
Et^ TedUKaaglk& ^ Box 3200. J%rpfe Gim 
FA 19002, 
1%e goafs Air Ifte oigan^on me: 

• To &icom^;^^Ci^r^mierto0mi^ 

• TQpimioii^tA^tiSWiM^Qcmr 

• To leixesent the Jiee# and concems of 
Apple II developers 

The orfjanization is intended for peopfe 
making a living using the ,4pp/e ii.-TW 

Problems Solved 

The yeat baltery debate for the [Igs Is over. 
The 'new* Ilys machines have a doclt battery in 
a snap^nA holder. 

Vern L Mastel 
BlsmEffck, N.D. 

I was pleased to note that with S/i/stem 5.0 
most Hgs Desld(q> ptOgrsM tm i^Adte tiie 

caOy. THki part fte nm sysban, 1^ 
Ap^We^ Mpa need merely hold down Ite 
OtmiSi key typing a letter and you 0i a 
different charader— and It will imdle accent 



correctly as well! 

For example, in Geneva to type Mossbauer 
you get the 6' by typing 'Option-u" (nothing 
appearsi then L\|)ing 'o' Similar methods gener- 
ate the other accents. This depends upon the 
font chosen, of coutsc. There is one problem: it 
causes the spelling checker some difficulties! 
This is a vast im|Htovemeiit ssnoqg We H/Sm 
improvements. 

On a sadder note, it appears that Call- 
A.F.F.LZ. has shifted la a quarterly - according 
to my (»Mre^ion(^ci& i^ them. This is an 
imfcstunate step as tt & Otie d' the few n^nttt- 
white Apple n magaa&es ava^f& It k wm 
more unfortunate that this occun^iiiitM ai^ 
notification, f can only suppose it Is W is 
lacii of advertising revenue. 1 think tiife is a 
major loss to the Apple II world. 

Stephen Marker 
Oaklelgh, Vic. 

The ligs Sy^em Software Option' key han- 
dling of the affemate A3C.ll characters (ASCII 
values I2&255) is sdectable from the Control 
Fane! t0A: the Alphabet CDEV has translation 
opdam ijf 'Standard' (Oie (^s&m key transia 
tionf or Tloiic'. // other proffsms that depend 
on option key sequences donl seem to recog- 
nize 'of^km <k^0iolie>'iiMSysimSo^tii^ 
5.0, try the Hone' aemis- 

TechAlliance's Ctii^ of Cali'AJ'^J^ ta 
a quarterly fr^om 4 sWar change in fomat 
fcff their mdrOosh pat^cs^ ^wnee^ 0Hm 
was the nwn^iy me Horbans, now tfiefe's 
Mac Tech QuatteTiy). Based on the rirst issue 
of the quarterly Call-AJ'.F.L.E. that weve 
seen, the. information conicnL is still there, but 
the quarterly format lets them print large arti- 
cles without imvbig to fireak tfiem into 
pieces.-lilD 

Installation problems 

Today I received the two A2-CeBtraI disks 
with the packed GS/OS System Software 5.0 
files and proceeded to install it on my hard 
disk, which has the last version on it. When tiy- 
ti^ to Install 'Update System FilesV I received 
an emt of Tite not round*. 

1^ (Nd soliidan b d^ete the Epson 
drivel^ and Sm. wpf ttie Bkes i«& Mai into 
the FdiitB foldiH; the foiir' lcmt$ neemaif ibd 
keep the Installer going weie: t) HehKtica.10, 
% mveaca. 12, a) Times.10, and 4) tt9)iGe.l4. 
A|i{^ently the imsller ejqpeds to find these 
Hies on ftK ISn^lxmJMi, and won't proceed 
i^lioutthem. 

Dennis Pay 
Leveiii^, Mich. 

AppleWorks time display 

Will some kind person write an AppleWorks 
3.0 patch to display time, date, and day of week 
at the menus and applications like soooo many 
PC pn)gi»ns do? 

Ralph OshiFO 
Manhattan tt^gtati 
John IMfs Saperfatcb €.1 In^i^ tm 
clock pakJKS.' one ^xc^icaily for the mi 
one for aaf FitjOOStcm^HStile ^dfSt: &mL 
SuperFaldi ts aawpt^Mmd t^ (Ski^, Qaaff^ 
^ Csxmpu^, 15102 C^ateyak, €msSe 
ftotete, mch. 48230, 313^1-dm, 
443^97; its $39.95.^ 



More BASIC conversions 

The fiooh by harry Helms is published 
by McOraw-tim BookCompanyr 1221 ktamfd 
the Americas, New York, N.Y. 10020 OSIIK OO?^ 
02795941. It Is a convenient guide to BASK as; 
used by Apple, Atan, Texas Instruments, Com- 
modore PET, IBM, and Radio ShacK personal 
computers. 

The commands and syntax for each version 
of BASIC are covered, including examples in 
many cases. Commands, statements and func- 
tions are listed alphabetically, from ABS to XOR. 
There is also a handy cross-reference chart for 
determining in which versions of BASIC each 
command, stalsemei^ or fun^on appear. 

Joseph Kline 

When I received Hie October ^aie of AtStt 
Cmbeal, I saw a couple of tetter t)M I feR I 
should respond to. 

Paqe 5.66, "BASIC Converdons'; T have been 

converting ,-\pp!esoft to GWSASIC for about 
three yearb and have found that for the most 
part Applesoft syntax v^ill v^ork in QW-B.A5(C as 
long as you don't use graphics commands and 
convert the screen control statements (HTAB, 
VTAB, etc.) to their appropriate QW-BASIC 
equivalents. The .'jcrecn control and POKE state- 
ments having to do with screen control and key- 
board I/O have equivcilents or can be simulated 
in QWSASIC. The POKE 36,ri can be converted 
to LOCATE ,n+l and the PEE1^(-16384) can be 
simulated with the following QW-BASIC code: 
10 ji$=nErf$: ir li39|a$i=o ira lo 

A book that Spence Earnshaw and others 
who are converting programs from Applesoft to 
other versions of BASIC might find helpful is 
r/ie B^SfC fbnelbook written by David A. lien. 
This book covers several versions of BASIC fcv 
many popular computers, and even gives UMs 
ccmmmdsf for oilier IMSI& if diffH^L B ^oe^ 
nt a/lfer a TB!ifs and PdCEs conversfcm, but if 
you imow what^ey do JN)|1 #ould be able to 
find an alftnmative method dT accomplishing the 
same function on smother machine. 

Page 5.67, BASIC editing": Qer^d L Hdinian 
and your other readers might also be interested 
in a program available on QEnle and America 
Online called BFU. This wonderful program 
should be in every BASIC programmer's library. 
1 have been using this program since 1985 and 
would never attempt to write a I?ASiC program 
without it. This program is a pre- processor for 
BASIC that allows the programmer to use labels 
instead of line numbers and will even convert 
line numbers to labels. It lets the programmer 
pass variables to library routines as well. It is 
also available in CF/M and MS-DOS versions for 
people that also require those formats. 

Page 5.71, 'Evangelism beyond Apple": My 
condolences to John Logan and anyone else 
who wishes to convert to IBM. i ve used Apples 
and IBM s for the last eight years and there's no 
way I d spend my liard earned money on an IBM 
or compatible. Rxind for pound, to me the 
A|wle i$ much more powerful and a better bar- 
gia than any of the lEKs or compatibles. In 
dpt years of sixteen hoias a dqnse tty it^ 
(^Idfia 24) as well gs my wife and 
spent §20 OR nMlenance for my 
Apple n nusf ln tbree yms of use $0 on my 
Ilgis. On the other hanC of the over 100 IBM's 
and compatibles where I woik we have spent 
several thousand in Just over the last two years 
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on machines that are used by adult profession- 
als only, riot to mention lost time and produc- 
tivity for training to use eacli piece of software, 
and still liave users that feel insecure with oper? 
ating the equipment. Of ttte. useis that do catch 
on quick and srt more comfortable with the 
equipment, the ones tJiat own Apples (and even 
Macs) far outnumber the IBM and contpab'ble 
owners, most of whom only use one or two 
pieces of soltwarel And there Is also the num- 
ber of publications for the "average user' of Bie 
Apple U compared witli none for the MS-DOS 
based machines {I don t count the game maga- 
zines and newspapers]. And even if you want Lo 
include the technical mj^jEizines, Dr. Dobb's 
Journal is the oniy one for MSrDOS In my opiti' 
ion. 

Richard Cain 
Blioxi, Miss. 

Joyful mouse 

1 have an Apple lie and an Apple Mouse 
which I frequently use with Ullral^acros for my 
business. I would like to add a joystick for 
games that my children (and their dad) are crav- 
ing to own. Is there a device, similar to an A-B 
switch for printers, which would allow us to go 
from mouse to joystick without actualty discon- 
necting any wires? 

Albert M. Pagani 

Toms River, n.J. 

We haven't tried it, but we'd suSjKii an A-E 
switch box that used the 9-pin DB-9 style con- 
nectors (with all 9 lines switched) would work. 
The older Macintoshs and many MS-DOS 
machines use 9-pin connectors, so companies 
that carry accessorie.'i for these systems may 
have the appropriate sxitch box. it would prob- 
ably tie wise to only switch the power lines 
with the computer power off, thoygb; the 
mouse uses some cortB&:tiats that Oie py- 
stich doesn't. 

If you would (iTfe to make your joystick act 
She a mouse, Ctl Products (1225 Stone Drive, 
San Marcos, CA 92069, 619-744-8546) sefte a 
device called ttie f^age which will do the 
tritJir It retails for J5* J5.-a/D 
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I Jpse fil jMsSafeointJ by Perlin Eiectroolcs. 
JSfl l^two years, however Per- 

lin ^dees mAst&sm be In business anymore, at 
least hot in the US. Does ariyone know where 

they are? 

The program that came with my card does 
not work properly with my llgs. 1 was told by 
Feriin that they had a new program that did 
viork: however, they never sent it. Gan any one 
of your readers help? 

Tlionias J. Scott' 
Mattapan, Maine 

TOPS over AppleShare 

I do some computer consulting work in my 
spare time for local small businesses and pri- 
vate individuals. Although most of that work 
revolves around Macintosh and MS-DOS com- 
puters, a significant amount involves Apple lis. 

Since most of my clients use only a few com- 
puters, I usually recommend TOFS and 
AppleTalk when a network systOT required, 
in my opinion it runs rings WiuM Apple's 
i^pteShare in terms of pexlatnxmte and cost, 
and it not m^ht. a diedkigM M^aM^ 
server. 

My praWem. howwa; is that T0FS 4(m mt 



support the Apple II. I want to be able to con- 
nect, an Apple llgs or Apple II with a Workstation 
card or similar device into an AppleTalk net- 
work and not only have peripherals .(LaserWrit- 
ers, tict^'orked ImageWriters) but jp^l bg able 
to use Macintosh and MS-DOS hanl diitfes for 
remote storage, transference and translation of 
files, etc. 

1 called the WFS Wvision of Sun Microsys- 
tems and was told essentially that it was a hare- 
brained idea and there was no money in it so 
TOPS would probably never do it He seemed to 
be unaware that an Apple 11 would run any soft- 
ware other tiian ^tam. 




I then ^Ig^ Qspm^a directly and 
vm told no mt3x prdluct was anticipated, if I 
wanted to use an Apple II I had to buy a Hadn-^ 
tosh and use AppleShare, How i like Macintosh^ 
es and 1 would Tike to get one eventually, not to 
replace my Apple 11 Plus, lie, or llgs, but to com- 
plement Ihem. But my clients operate on shoe- 
string budgets, which is why (alas!) too much of 
my work is done gratis, and a dedicated 
machine is unacceptable. 

Do you know of any products out there which 
do this? Or how do I get access to the appropri- 
ate TOFS protocols so I can write it myself 
(UQtlO? Maybe there is a patch to AppleShare 
which removes the requirement for a Macinlosh 
server I would be happy even if its operation is 
not as seamless as TOFS between the Macin- 
toshes and MS-DOS machines, 

Timothy B, Tobin 
Carson, Calif. 

POP, don't CALL 

tin pti ten me why iiis $infpie; pto^m 
bombs into the monftor?; 

10 I = 1 

20 PEim: I: GOSDl 30 

30 I = I + 1: CAll -3286; GOTO 20 

I'm using your suggested CAIl, -2288 ('Dig- 
gins into DOS', Opea-Appte, January 1985] to 
clear the return stack. 

Spence Earnshaw 
TOchmond, B.C. 

CALL -3288 clears information from OHERR 
GOTO from the stack, but that's not the same 
as the return address information that a 
QOSUB places on the slach.. Applesoft has a 
command specifically to remove a return 
address from the slack: FOF. If you replace 
CALL -3288 with FOF In your program it will 
run until a floating point o'verflow error. Reset, 
CffliJwtfC eretber MerrBp§on.-OJD 

Opening files 

I'm confused, and do not know where to 
turn. It says in the FroDOS 8 Technical Refer- 
ence Manual chapter 2.1.3 (page 14 of my 
copy) that you can have a maximum of eight 
files apea g, a Uii©* J have hied to do Hat with 
some {gap: te^ :fiil<^ and it seems th^ &t!m cm 
be many open files but you can not read or 
write to them. I've tried many variaQons of what 
seems to be the logical approach i.c. OPEM file, 
liEAD file, OPEM file2, READ fiie2, OPEn BIe5, 
WaffiE files, etc It seems that the mjst files I 
have open is one at a time. 



flow would you go about this? Is there a 
solution? 1 already looked in <^>ea-Appte..,\ 
mean AZ-Cenb^ and cant find any dues. 
Please Help! 

John Rohan 

Albany, Calif. 

'Open' in this context means the file has a 
memory buffer and a reference number 
assigned to it; these won't be deallocated until 
you close the file. The purpose of opening the 
file is to make information about the file avail- 
able in memory (in the nie's buffer] so that it 
wont have to tx reconstructed each time you 
acce.ss (he file. If you need to n'rite a large 
amount of data to a file in several sequential 
operations, for example, you dont have to 
update a pointer to indicate where each new 
segment lis to be written; FroDOS wltl track the 
positlon-in-Tile pointer for you as you add each 
segment. ^ 

Each of e«(/if Hies can be open under Fro- 
DOS 8, iJMf ftoDOS can onfy operate on one 
fae at a timet it must be toW w/iJcft /?/e Is as- 
tetUly heii^ referred to and Whst op^im 
(read, wrfte, and so on) Is to be performed. 
tYom machine language, this infoimaUoii is 
passed lo the FioDOS mcfriii^ laa^ua^ inter- 
face as psft of tite paramdters (or the opera- 
tion. Fmm BASIC, yoa use tbe pathname for 
the file aioi^ with the KEAD or WRiTt com- 
mand to tell FroDOS which file (and operation) 
you're interested in. A s/mp(e example would 
tic a program to copy all string in FI!£i to 
rilE2: 

10 D$ = CHR5 (1| : ONEBS GOIO % 

20 PRIHT eS,-"opiii nsEl" 

30 TKIHT 115; "OPES FIIII2" 

40 fBIim)$;'Ii£iD FILEl" 

SO TSm RK »tiinf wid Sm tfiXl 

GO PEtnil DS,''IRITE FUEZ" 

70 FSm A): REH striilf vritten ta I1t£2 

BO GOTO 40 ■ RS continue nntil error 

90 tm 216, D: CMJ, - mi: R£H clear Wm 

100 PRINT D^i'aOSE": BSf sbut dom 

Roth riLEi and ni£2 are continually open 
in the loop from lines 40 to 80 so that FroDOS 
can track the current position in each file. 
When a file is first opened, tite pointer points 
at the bCj^ntuBg of hie file; each time data is 
read from the file, the po^m i$ iq)dated to 
one byte p»t tfie encf of ttte <*3la just read. 
When a file is written to, the posjfjnn is updat- 
ed to one byte past the data wrSten. So tfte 
loop reads a string from fllEt and /eaves 
EILEVs posit ion-in-fiie pointing at the start of 
the next siring tor the end of the file), then 
writes Ihe siring to /7LE2 and' leaves FILE2's 
pointer pointing at the end of FILE2. When a 
read is attempted at the end ofFlLEI, an 'OUT 
OF DATA' error occurs and the program ends. 

If the flies, do not remain open in the loop, 
the petition information is lost If FlLEl is 
closed, the BASIC.SYSTEM 'AFFEfiD' command 
can be used lo move the posilion-in-file pointer 
lo the end of the file before continuing to add 
data. But FILE I is a bigger problem; closing 
FlLEl before all the data is read leaves the 
dilemma of knowing where the next access 
should resume. The program above leaves the 
position tracking to FroDOS; a program that 
c/(ttc:d riLEI in the loop and wanted to resume 
copying string wh&'e it left off will have to 
tmdi the 'pmlmittSie' i^.-DJD 
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Database date data 

I think I have a solution for Hetth J. Soda's 
date proMeni .in Uie October 1989 issue, KdLh 
was having trouble enteiing and sorting chrono- 
lo(|ical dates in a data base of space launches. 

"wy recommendation Is to . enter data in 
YYYYNMDD format using numbers sn^. For 
example, instead of using Sep 29 89 as the 
date, use 19890929 or 1989 09 29. Witli this 
method AppleWorks will not tnincate 1989 or 
1889 into 89. 

Of course it is somewhat hard to read, but so 
was the conventional format when we were in 
first grade, rurlhfrmore one could always enter 
a conventional format in another cst^Qi^ ^Bid 
write a macro to do the work. 

Sometimes its best to look beyond the traidi- 
tional way of expressing something. 

Lee Dronick 
San Diego, Calif. 

GS/OS version numbers 

I (eceii% pBWhasest fiS/<3S S.0 ftom my 
dealer ^ wilii^ J boot my hard disk ^e 
space bar or escape keys pressed^ I'm hJld 1 
have QS/OS v5.0. Why is that? 

Jon tOnebel 

napeiville. 111. 

The '5.0' actually refers to the //gs System 
Software version. Each of the associated com- 
ponents such as QS/oa, the toolset files, driv- 
er flies, and so on will have its own version 
since it logically exists as a distinct 'subsys- 
tem'. In the case of the version of OS/OS (mi 
many of its modules) supplied with System 
Softimre 5.0, the version number is 3.0. 

The disthict vwim number> aid ia backli^ 
ffie m^^asi leveis of each c/ the compmei^ 
of OK Itgs System Sottware. TVie ff^ System 
Software is currently supplied as fbts 'set Of 
modules' when you upgrade your system soft- 
ware, t)ut if a program needs to check a mod- 
ule to see if His the j^per versKjn, it can do 
SO.-IXJD 

GEnie access in Canada 

[ wish that QEnie would create local access 
numbers for those of us in Canada, 1 under- 
stand that they are going to link up with INet; 
that will let us access GEnie via Datapac. This is 
supposed to happen in the fall. If and when il 
does can you let us tsnow so we can Join every- 
one else on GEnie? 

neil Butchard 

Ji»ittoba 

Jfisilappefied; Qenera! Electric CariM&St jti&, 
aiai&Biiced Ok expanded service access dd6- 
tser 5, 1989. The cost to access QEnie via the 
iHet 2000 gateway for 166 Canadian cities is 
$4.95 (Canadian) per hour billed by the local 
telephone companies on behalf of Telcomm 
Canada; this is in addition to the basic QEnie 
connect rates charged by 0£ Canada.-DJD 

Odd type of files 

FroDOS ijllows certain characters in file 
names: upper case letters, numerals, and peri- 
ods, Lower case letters are converted to upper 
case. However, .AppleWorks file names also 
have lower case iclters and spaces. When I CAT 
an Apple Wori« file in BASIC, SYSTEM with Copy 
11 nus, etc., as expected the spaces are convert- 
ed to periods and lower case letters to upper. 
Howevec ApjrieWorks can then accept the ille- 
gal characters. Itow does AppleWorks find char- 



acters that FroDOS says dont exist in the file- 
name? 

By the way, I am very satisfied that you are 
Uncle DOS and not Aunt DOS. in today s litierat- 
ed society. Aunt DOS would go by the name 
Tis. BOS', whldi resdiy wouldn't suit you. 

Bany M. Austern 
Cindnatti, Ohio 

AppleWorlfS cheats. !t uses the Die's 'aux' 
type' field, i^herwise unuseti forllK M>B, AW, 
and MP W^pes, to hM a 'tnask' to indlcste 
the case of the fflename^s leliers and whetiwa 
period or space sAou/d be used when the Bit- 
name is displayed on the screen. The auxtype 
field is If) bib long, which is enough to assign 
one bit to each character of the filename (with 
one to spare). If the hit is "0", then the charac- 
ter is displayed in it's I'roOOS form; if the bit is 
'i ' the character is dirtptayed as lower case if a 
letter or as a space if the character is a period. 
You'll notice spaces are the only 'non-FroDOS' 
characters accepted while specifying a Hie- 
name for AppieWorlis use. Since AppleWorks 
does this translation, the filenames are dis- 
played normally by froDOS utilities, which gen- 
erally don't use the auxtype field as Apple- 
Works does. In fact, Apple has reserved the 
use of the auxtype Held for future designations 
of filetypes, and any use of this field must be 
cleared through Apple I! Developer Technical 
support if you e.tpect your files to work cleanly 
in possib/e futuie Apple II software environ- 
ments. Apj^ a UTS now publishes Appte B 
FBe Type notes for rea^izEd wd docwmnt- 
ed filetypes as part of the technical note releas- 
es. 

Ifgs users may notice that lowercase Chatac- 
ters are now accepted by the i^oDOS FST sup- 
plied with System Software 5.0. Unlike Apple- 
Works, the ffoDOS rST uses the ftoDOS direc- 
toryS version and min_version fields for each 
entry to store the 'mask' for that entry. The 
case does not affect the 'uniqueness' of the 
names; for example, you can't create files 
named 'My.fi'/e' and W.niE' in the same 
directory without generating an error informing 
you of a duplicate filename. Having lower case 
available does allow you to use letter cases (as 
opposed to just periods) to emphasize portions 
of the name Ct^stBackup" rather than 'LAST- 
5ACnUF' or lAST.BACKUP'). Again, most Fro- 
DOS 8 utilities won't recognize the case distinc- 
tion because they arent expecting to Interpret 
the version and min_verskm bifoim^ai In 
that manner.-DJD 

Pascal Gompatibility 

Th riespotise to Shangful Nigam s question 
about OBCA/Pasc^ and ylpp/e Fasad comp^ 
billty: while I have no experience Wh 

ORCA/Pascai, 1 have imported Apple Pascal pro- 
grams into TML Pascal and have run them with 
little or no modification. The original structure 
of Pascal, if followed by the designers of the 
application package, should assure that what is 
written in UC5D Pascal should run on other 
strains of Pascal 

On UC5D Pascal: when I originally purchased 
Apple Psscal i found a grand total of three 
books listed in &ooks in Print about Apple Pas- 
cal: not much to go on. While the manual that 
accompanies Apple Pascal is quite functional, it 
still didn't answer all of the questions that 1 had, 
and the questions that I directed towards my 
dealer (Apple's answers to problems) for the 
most part went unanswered, or if they did final- 



ly get answered, I had flicm Gpied out by then. 
While at a large libraiy, I was locking through 
the programming language section and came 
across many volumes on UC5D Pascal but for 
the iBM. I checked out a few and lo and behold, 
the commands for the IBM were the same as for 
the Apple (about 30% of the commands were 
missing from the Apple version, but they are 
commands that one really doesn't need); there 
were commands that worked that Apple hadn't 
mentioned in their manual. The biggest point is 
that 1 l^iKd mudi tfom them. 1 guess that the 
messs|[e don't get hung up on keeping 100% 
within jour Itoe'. There is an awful lot of infor- 
mation on compt'teB and application programs 
out Qiere; information that can «BKi does cross 
party lines; 

ftndy Conrad 
■poBiiigfon, Wyo. 

Assembly listing 

How can 1 invoke the Ifet command from t 
machine language program without returning 
and getting an error that returns me to the mon- 
itor? 

Marc fteiberman 
Framingham, Maine 

All of the Apple II monitor ROMs have the 
entry point inSTDSP ($raDO) in cmtim* thb 
disassembles and displays one assembly lan- 
guage Instructiai. To use the routine, you put 
a pointer to the address yon want to dkassem- 
Me hilo $3A (low byte} and $3B (Aigfi t^e), 
and JSfi $/800. Wihenyou retam, $2l'wHi coo- 
tsatt the length of the last instnictibn disassem- 
bled, minus one. We incorporated Oils into a 
routine to disassemble 20 Unes of code; our 
miniassembler program Joote iffce this (a^er 
we add some comments): 



O300: AJ 00 


ujA m 


;poM t« $0300 


0302: 85 3A 


SIA 3A 




mi: A9 03 


U& if03 




03O6: 85 3E 


JTA 3B 




03O8: A5 14 


LDA itl4 


;iia« 2D decimal. . 


Om; as 24 03 


m 0324 


;.,.» m.s6mex 


930D; 20 DO tt 






u 2r 


ni::2f' 




0311: IS 2F 


m& 




Q314: 18 




riiU t« poMer 


0315: E5 3A 


ABC 3A 




0317: 85 3A 


SIA 3A 




0319: 90 02 


ECC 031E 




0318: li 3B 


IHC 3B 




031D: a 2i 03 


DEC 0324 


/one lees line to d« 


0320: DO IB 


^ 0300 


rail dcoe if 


0322: 19 


ac 


;]nst for BASIC 


0323: eO 


m 




0324: 0! OB 


(XS OB 




0326: 00 n 


BBK 17 





The last two lines are 'junk' bytes which the 
1^ inSWSPjnteipiets as best it can. We xcte a 
memoiy kx^aa to hoki the eounter for Hie 
nimtyer of lines to disassemble because 
insTDSP scrambles the contents oi the A. X. 
and Y registers. 

This same routine can be CAUbed from 
Applesoft; Junt POKE the desred starting 
address into the routine. Or modify It to work 
the way you like. The CLC immediateiy before 
the RTS is there to insure the carry is clear 
txfore returning to Applesoft; otherwise, 
Applesoft believes a program error has tyeen 
encountered. (V/e used CALL 768 to generate 
the Mit^ above.}-DJD 



5^ Al^tral 



m 5, no. 10 



Off the (Apple Desktop) Bus 

I Ihinh 1 have found anolher "rotten" ^fte 
service policy. I have tiad an Apple ligs for over 
one and one-haif years wilh no problems until 
now. 1 was recently writing a report and my 
Apple began locking up on me. 1 .soon discov- 
ered that the ieft Apple Desktop Bus Fort on the 
Keyboard wasn't working properly. This side was 
connected to the back of my Apple. 1 switch the 
ADB cable to the ri^t port which works fine. 

I took my keyboard to an Apple service repair 
shop, hoping that they would just replace the 
defective port for a few dollars. They Eold me 
that their policy is to trade in the keyboard for 
another at a cost of $99. I think this is outra- 
geous for something so simple to repair. They 
also said they dont know where to get ADB 
ports; If th^ did thqi would ref^ defective 
ports instead 

1 am wifting to you, hoping tiiat yaa (kirn of 
yo\a reacters ICBOtts where I could get an Apple 
Deslttdp !^ for my keyboard and replace it 
myself. Sbfce Hkr are other companies that 
mate taq^OBRls fior the Ilgs, this port must be 
available to the pubitc and not just A^e. 

Leo Q. Schnitder 
Theresa, Wise. 

My llgs keyboard also started acting erratic, 
but It was the ADB connector on (ht right 
(Mijdt / use for the llgs mousei. I opened up 
Uk Inboard and discovered that the Apf^e 
DesMop Bus connectors werent physicaHy cm- 
nected to the supporting printed circuit board 
except by the 'solder tails'. The solder used in 



elect! uriic^ isn't designed to be a structural 
material: it you flex the connector very imich. 
It's likefy it will come loose. Since there will be 
some pressure from trying to make sure the 
Din plug is seated Ftimiy in the socket, muft/pfe 
inserti<»ifletmvid xycies may cause tffeakagfi 
eventug^i 

in Jiy case, Ute sokfer bad puSed ioose 
from the connector >ads' on £lie pdnted cif- 
cult board; if Bie ectiM^oii was baoj^ed, am- 
tact ifas broken aad tte j|p aivted g^t^ 
bad data from Uk tmaCi ltatbeF ||B0 
it in, I opted to s<M& fianpas fiwa ^ At^ 
amnetiOF to (tie proper contacts on t6e p£at* 
ed drcuS boartf. IT Hie connector Itsdf h ivat 
damaged and you elect to give up any trade-in 
value for your keyboard, you m/gftt risk trying 
such a repair. 

If the connector itself is Ixid, you may fmd 
an item from ORA Electronics. 9410 Owens- 
mouth Avenue, FO Uox 4029, Chatsworth, 
Calif 91313, (818) 772-2700 to be a suitable 
mplaccment. Their order number is rDX820 
CFCB mount-female right angle 8 pin mini DH 
connector), and the ccmnectors cost $1.60 
each in lots of Jess than 12. We haven't actual- 
ly ordered any to compare with the one on the 
Apple keyboard to see if they are identical: 
other electronks parts suppliers may stock a 

Crashing success 

After several months of arduous toil, folttiFulr 
ly saving our cmtntty's n^ds and fulfilOm te 
liawfis tn^^, we ime been leiKtttded wi s 
glcnrious ii«de Of MR IR 'Bmibat^. %<i|im> ^ 
tralia. However, eiler an 0d!mm^ aftd bor- 
ough search of Uils dean, ftieitdly^ town of 
25,000 inhabitants, It Is patently obvious that I 
have no one here to talk with. Wl^ Wo Apple 
dealers, no Apple software, (And, in case an^ 
one cares, no Mac s, either!) 

now for my main contribution of late,, which 
might be of interest to some. The Mouring Is 
an excerpt from a i^ter I am sendlns to 
Computer inc.: 

I purchased my first Apple, a lie, in ih% or 
1987. In January of 1988, I sold the lie (wish 
that I had kept it, now! and purchased a Ilgs 
with the following equipment and configuration: 

Applied Ei^eeilhg ia/Sie^& 
Applied En^neeilng GS^tli^Bi^ «^ one meg 
Apple .nemoty Expansion Board ndA onemeg 
TU^deas Consemr containiiig two Apple 5.5 

drives 
"Apple 5,25 drive 
"Apple ROB color monitor 

"The system is physically ,sel up with the 
Consewer on top of the CPU, and the monitor 
^Uilig above the ConseA'er. The single 5.25 
drive is daisy-chained and sits behind the rest 
of the equipment. 

'Mow, why should all of tiiis be important to 
you? 

'I am in the U.S. navy, sendng aboard the 
^aduaaa. l%rtte pM fouorntonjis. we 
have been bobbing irognd t^tw^ Ocean, 
rtorth AiaUan Sea, and the Pen^ QuE cany- 
ing out the Navy's mls^. Hy ^stem 
become an indispensable aid in my worR ceii- 
ten I use It constantly, and have two 3.5 disks 
containing various AppleWorks files pertinent to 
my work center in the two drives. (AppleWorks 
boots up from an BOOK ROM disk supplied by 
the RAMHee.per.) 

"A week ago, we were exposed to a mild 



storm (you probably guessed, but keep on read- 
ing), and my entire system with the exception of 
the keyboard Ut the deck! It is irrelevant as to 
who failed to secure the restraining system; it 
toppened. On one particularly violent roll, 
everything slid off the 36 inch counter tap. 1 
was Informed the next momlns. 

msth my heart ns&aq below the wateriine, I 
gsK the ^iteraa quldti^baailnspecaon. Riat 
damge iigpdit neve^ed: 
'l-itR tncti and onNiaif in mttimmei 

pBm^ upl^ liiBtit cdfn^ ide, of Qa5Js5 

dthie. 

% Rubber mounting Feet of 3,5 drives and KQB 

monitor knocked ofT. 
'9- He^aUustment strip ¥m imStot 

knocked off with a 3 inch split on the left 

end (lower position), 
'4- ROB monitor video plug loose on monitor. 
"5- Internal visual in.speclioii of the CPU ca8e 

revealed no apparent damage. 
"6- Although the IWIheeper baUer>' cable had 

become disconnected, 1 was informed that 

the transformer cable had not. 

'My presfnl rating is interior Communications 
Electrician, and 1 am a former Electronics Tech- 
nician with over 25 years total experience. So. 
after a thorough visual inspection, but still with 
hesitation, 1 reconnected everything and pow- 
ered up. When the monitor screen remabed 
blank, my spirits joined it! However, I was not 
about ready to give up totally. 1 powered down 
the system, and went back to the monitor video 
disconnected it again, tightened up ti» 
i»euntins studs and reconnected the piug. 
for the second attempt 

^Idce you m reading thte. It must be #>vl- 
ous that everything woitelii 

'While I ^ noi te^onim^ anyone attempt 
to duplicate this tesf with a "messy-DOS sys- 
tem, or even the 'other* one Apple produces, I 
feel that my experience gives a loud and dear 
statement as to the ruggedness and quality of 
Apple II products. Besides an overwhelming 
feeling of relief after seeing Appie Works up and 
ready to go on the second power-up came 
thankfulness for all of your eng^teeis and ipaB- 
ty control personnel. 

however unless ihis .ship capsizes, there 
won I be a repeat of this test on my equipment!" 

needless to say, 1 was very lucky. But a lot of 
that "luck' can be attributed to our computer 
and its manufacturer, The mly dam^ sus- 
tained is purely cosmetic. 

Even though l ^ree with the editorial com- 
ments/ and others, that Apple seems to he 
ignorliig us in favor of Baby Brother* 
iA+/inOder «litoria] for June), I feel that we 
should also ^nead the word ami keep encour- 
a^g those 'on the Inside' at Apple that we 
appreciate what th^ are doing. Also, mayhe, 
just maybe, after my experience, the 'Premium' 
price we are paying for (and complaining about) 
Apples may be justified. 

I have over 25 years experience in the elec- 
trom"cs and electronic equipment fieM. Kcci- 
dents happen. But this is the first time that I 
have witnessed one of those accidents wherein 
the equipment (including ruggedized military 
equipment) sustained only minor cosmetic dam- 
age, and all parts of (he system functioned nor- 
mally. Tiy dropping your 18 portable TV three 
feet and see what happens! (Better yet, throw 
an IBn ckme on the floor and see what it doesi) 

W. D. WaUerson 
5sa Francisco, Calif. 
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